﻿Imports System
Imports System.ComponentModel
Imports System.Reflection
Imports System.Resources

<AttributeUsage(AttributeTargets.All)> _
Friend NotInheritable Class SRDescriptionAttribute
    Inherits DescriptionAttribute
    ' Methods
    Public Sub New(ByVal description As String)
        MyBase.DescriptionValue = SR.GetString(description)
    End Sub

    Public Sub New(ByVal description As String, ByVal resourceSet As String)
        MyBase.DescriptionValue = New ResourceManager(resourceSet, Assembly.GetExecutingAssembly).GetString(description)
    End Sub

End Class


